home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 21
/
Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso
/
Aminet
/
util
/
misc
/
gpatch.lha
/
GPatch
/
ExampleScripts
/
UpdateMyProgram
< prev
next >
Wrap
Text File
|
1997-05-11
|
898b
|
30 lines
;Patch the files on the distribution disk "MyProgram".
;The quotes in the command lines are only necessary if the path/filename
;contains spaces.
echo "*N Please wait..."
assign MyProgram: remove ; if you install the update on disk and the disk name
; and the assign are identical
failat 9
gpatch "MyProgram:MyProgram" "MyProgram.patches" T:newfile
copy T:newfile "MyProgram:MyProgram"
gpatch "MyProgram:MyProgram.readme" "MyProgram.patches" T:newfile
copy T:newfile "MyProgram:MyProgram.readme"
; If you are working on floppy disks, it may be better to copy the files to a
; faster location, because the lot of file seek and read actions on floppy
; disk are slow.
;copy "MyProgram:MyProgram" T:oldfile
;gpatch T:oldfile "MyProgram.patches" T:newfile
;copy T:newfile "MyProgram:MyProgram"
;delete >nil: T:oldfile
delete >nil: T:newfile
echo "*NPatch successful."